	  �x  �   k820309    �
          11.1        ��_                                                                                                           
       m_netcdf_io_write.F90 M_NETCDF_IO_WRITE              gen@NCWR                                                        u #NCWR_SCAL_R4    #NCWR_SCAL_R8    #NCWR_SCAL_INT    #NCWR_1D_R8    #NCWR_1D_R4    #NCWR_1D_INT    #NCWR_1D_CHAR %   #NCWR_2D_R8 ,   #NCWR_2D_R4 3   #NCWR_2D_INT :   #NCWR_2D_CHAR A   #NCWR_3D_R8 H   #NCWR_3D_R4 O   #NCWR_3D_INT V   #NCWR_4D_R8 ]   #NCWR_4D_R4 d   #NCWR_4D_INT k   #NCWR_5D_R8 r   #NCWR_5D_R4 y   #NCWR_6D_R8 �   #NCWR_6D_R4 �   #         @     @X                                              #NCWR_SCAL_R4%TRIM    #VARWR_SCAL    #NCID    #VARNAME                  @                                 TRIM           
@ @@                                  	                
@ @@                                                   
@ @@                                                 1 #         @     @X                                              #NCWR_SCAL_R8%TRIM    #VARWR_SCAL    #NCID 	   #VARNAME 
                 @                                 TRIM           
@ @@                                  
                
@ @@                              	                     
@ @@                             
                    1 #         @     @X                                              #NCWR_SCAL_INT%TRIM    #VARWR_SCALI    #NCID    #VARNAME                  @                                 TRIM           
@ @@                                                   
@ @@                                                   
@ @@                                                 1 #         @     @X                                              #NCWR_1D_R8%TRIM    #VARWR_1D    #NCID    #VARNAME    #STRT1D    #CNT1D                  @                                 TRIM          
@ @@                                                 
    p          5 2 � p        r      n                                        1      5 2 � p        r      n                                           1                                 
@ @@                                                   
@ @@                                                 1           
@ @@                                                     p          p            p                                   
@ @@                                                     p          p            p                          #         @     @X                                              #NCWR_1D_R4%TRIM    #VARWR_1D    #NCID    #VARNAME    #STRT1D    #CNT1D                  @                                 TRIM          
@ @@                                                 	    p          5 2 � p        r      n                                        1      5 2 � p        r      n                                           1                                 
@ @@                                                   
@ @@                                                 1           
@ @@                                                     p          p            p                                   
@ @@                                                     p          p            p                          #         @     @X                                              #NCWR_1D_INT%TRIM    #VARWR_1DI     #NCID "   #VARNAME #   #STRT1D $   #CNT1D !                 @                                 TRIM          
@ @@                                                    	   p          5 2 � p        r !     n                                        1      5 2 � p        r !     n                                           1                                 
@ @@                              "                     
@ @@                             #                    1           
@ @@                              $                       p          p            p                                   
@ @@                              !                       p          p            p                          #         @     @X                            %                  #NCWR_1D_CHAR%TRIM &   #VARWR_1DC '   #NCID )   #VARNAME *   #STRT1D +   #CNT1D (                 @                            &     TRIM ,         
@ @@                             '                     3   p          5 2 � p        r (     n                                        1      5 2 � p        r (     n                                           1                                         
@ @@                              )                     
@ @@                             *                    1           
@ @@                              +                    1   p          p            p                                   
@ @@                              (                    2   p          p            p                          #         @     @X                            ,                  #NCWR_2D_R8%TRIM -   #VARWR_2D .   #NCID 0   #VARNAME 1   #STRT2D 2   #CNT2D /                 @                            -     TRIM          
@ @@                             .                    
      p        5 2 � p        r /     n                                    1  p          5 2 � p        r /     n                                           1    5 2 � p        r /     n                                       2      5 2 � p        r /     n                                           1    5 2 � p        r /     n                                       2                                             
@ @@                              0                     
@ @@                             1                    1           
@ @@                              2                    
   p          p            p                                   
@ @@                              /                       p          p            p                          #         @     @X                            3                  #NCWR_2D_R4%TRIM 4   #VARWR_2D 5   #NCID 7   #VARNAME 8   #STRT2D 9   #CNT2D 6                 @                            4     TRIM          
@ @@                             5                    	      p        5 2 � p        r 6     n                                    1  p          5 2 � p        r 6     n                                           1    5 2 � p        r 6     n                                       2      5 2 � p        r 6     n                                           1    5 2 � p        r 6     n                                       2                                             
@ @@                              7                     
@ @@                             8                    1           
@ @@                              9                       p          p            p                                   
@ @@                              6                       p          p            p                          #         @     @X                            :                  #NCWR_2D_INT%TRIM ;   #VARWR_2DI <   #NCID >   #VARNAME ?   #STRT2D @   #CNT2D =                 @                            ;     TRIM          
@ @@                              <                          p        5 2 � p        r =     n                                    1  p          5 2 � p        r =     n                                           1    5 2 � p        r =     n                                       2      5 2 � p        r =     n                                           1    5 2 � p        r =     n                                       2                                             
@ @@                              >                     
@ @@                             ?                    1           
@ @@                              @                       p          p            p                                   
@ @@                              =                       p          p            p                          #         @     @X                            A                  #NCWR_2D_CHAR%TRIM B   #CHAR_2D C   #NCID E   #TVARNAME F   #STRT2D G   #CNT2D D                 @                            B     TRIM ,         
@ @@                             C                     6     p        5 2 � p        r D     n                                    1  p          5 2 � p        r D     n                                           1    5 2 � p        r D     n                                       2      5 2 � p        r D     n                                           1    5 2 � p        r D     n                                       2                                                     
@ @@                              E                     
@ @@                             F                    1           
@ @@                              G                    4   p          p            p                                   
@ @@                              D                    5   p          p            p                          #         @     @X                            H                  #NCWR_3D_R8%TRIM I   #VARWR_3D J   #NCID L   #VARNAME M   #STRT3D N   #CNT3D K                 @                            I     TRIM          
@ @@                             J                    
        p        5 2 � p        r K     n                                    2  p        5 2 � p        r K     n                                       1  p          5 2 � p        r K     n                                           1    5 2 � p        r K     n                                       2    5 2 � p        r K     n                                       3      5 2 � p        r K     n                                           1    5 2 � p        r K     n                                       2    5 2 � p        r K     n                                       3                                                         
@ @@                              L                     
@ @@                             M                    1           
@ @@                              N                       p          p            p                                   
@ @@                              K                       p          p            p                          #         @     @X                            O                  #NCWR_3D_R4%TRIM P   #VARWR_3D Q   #NCID S   #VARNAME T   #STRT3D U   #CNT3D R                 @                            P     TRIM          
@ @@                             Q                    	        p        5 2 � p        r R     n                                    2  p        5 2 � p        r R     n                                       1  p          5 2 � p        r R     n                                           1    5 2 � p        r R     n                                       2    5 2 � p        r R     n                                       3      5 2 � p        r R     n                                           1    5 2 � p        r R     n                                       2    5 2 � p        r R     n                                       3                                                         
@ @@                              S                     
@ @@                             T                    1           
@ @@                              U                       p          p            p                                   
@ @@                              R                       p          p            p                          #         @     @X                            V                  #NCWR_3D_INT%TRIM W   #VARWR_3DI X   #NCID Z   #VARNAME [   #STRT3D \   #CNT3D Y                 @                            W     TRIM          
@ @@                              X                            p        5 2 � p        r Y     n                                    2  p        5 2 � p        r Y     n                                       1  p          5 2 � p        r Y     n                                           1    5 2 � p        r Y     n                                       2    5 2 � p        r Y     n                                       3      5 2 � p        r Y     n                                           1    5 2 � p        r Y     n                                       2    5 2 � p        r Y     n                                       3                                                         
@ @@                              Z                     
@ @@                             [                    1           
@ @@                              \                       p          p            p                                   
@ @@                              Y                       p          p            p                          #         @     @X                            ]                  #NCWR_4D_R8%TRIM ^   #VARWR_4D _   #NCID a   #VARNAME b   #STRT4D c   #CNT4D `                 @                            ^     TRIM          
@ @@                             _                    
          p        5 2 � p        r `     n                                    3  p        5 2 � p        r `     n                                       2  p        5 2 � p        r `     n                                       1  p          5 2 � p        r `     n                                           1    5 2 � p        r `     n                                       2    5 2 � p        r `     n                                       3    5 2 � p        r `     n                                       4      5 2 � p        r `     n                                           1    5 2 � p        r `     n                                       2    5 2 � p        r `     n                                       3    5 2 � p        r `     n                                       4                                                                     
@ @@                              a                     
@ @@                             b                    1           
@ @@                              c                       p          p            p                                   
@ @@                              `                       p          p            p                          #         @     @X                            d                  #NCWR_4D_R4%TRIM e   #VARWR_4D f   #NCID h   #VARNAME i   #STRT4D j   #CNT4D g                 @                            e     TRIM          
@ @@                             f                    	 !         p        5 2 � p        r g     n                                    3  p        5 2 � p        r g     n                                       2  p        5 2 � p        r g     n                                       1  p          5 2 � p        r g     n                                           1    5 2 � p        r g     n                                       2    5 2 � p        r g     n                                       3    5 2 � p        r g     n                                       4      5 2 � p        r g     n                                           1    5 2 � p        r g     n                                       2    5 2 � p        r g     n                                       3    5 2 � p        r g     n                                       4                                                                     
@ @@                              h                     
@ @@                             i                    1           
@ @@                              j                       p          p            p                                   
@ @@                              g                        p          p            p                          #         @     @X                            k                  #NCWR_4D_INT%TRIM l   #VARWR_4DI m   #NCID o   #VARNAME p   #STRT4D q   #CNT4D n                 @                            l     TRIM          
@ @@                              m                     $         p        5 2 � p        r n     n                                    3  p        5 2 � p        r n     n                                       2  p        5 2 � p        r n     n                                       1  p          5 2 � p        r n     n                                           1    5 2 � p        r n     n                                       2    5 2 � p        r n     n                                       3    5 2 � p        r n     n                                       4      5 2 � p        r n     n                                           1    5 2 � p        r n     n                                       2    5 2 � p        r n     n                                       3    5 2 � p        r n     n                                       4                                                                     
@ @@                              o                     
@ @@                             p                    1           
@ @@                              q                    "   p          p            p                                   
@ @@                              n                    #   p          p            p                          #         @     @X                            r                  #NCWR_5D_R8%TRIM s   #VARWR_5D t   #NCID v   #VARNAME w   #STRT5D x   #CNT5D u                 @                            s     TRIM          
@ @@                             t                    
 '           p        5 2 � p        r u     n                                    4  p        5 2 � p        r u     n                                       3  p        5 2 � p        r u     n                                       2  p        5 2 � p        r u     n                                       1  p          5 2 � p        r u     n                                           1    5 2 � p        r u     n                                       2    5 2 � p        r u     n                                       3    5 2 � p        r u     n                                       4    5 2 � p        r u     n                                       5      5 2 � p        r u     n                                           1    5 2 � p        r u     n                                       2    5 2 � p        r u     n                                       3    5 2 � p        r u     n                                       4    5 2 � p        r u     n                                       5                                                                                 
@ @@                              v                     
@ @@                             w                    1           
@ @@                              x                    %   p          p            p                                   
@ @@                              u                    &   p          p            p                          #         @     @X                            y                  #NCWR_5D_R4%TRIM z   #VARWR_5D {   #NCID }   #VARNAME ~   #STRT5D    #CNT5D |                 @                            z     TRIM          
@ @@                             {                    	 *           p        5 2 � p        r |     n                                    4  p        5 2 � p        r |     n                                       3  p        5 2 � p        r |     n                                       2  p        5 2 � p        r |     n                                       1  p          5 2 � p        r |     n                                           1    5 2 � p        r |     n                                       2    5 2 � p        r |     n                                       3    5 2 � p        r |     n                                       4    5 2 � p        r |     n                                       5      5 2 � p        r |     n                                           1    5 2 � p        r |     n                                       2    5 2 � p        r |     n                                       3    5 2 � p        r |     n                                       4    5 2 � p        r |     n                                       5                                                                                 
@ @@                              }                     
@ @@                             ~                    1           
@ @@                                                  (   p          p            p                                   
@ @@                              |                    )   p          p            p                          #         @     @X                            �                  #NCWR_6D_R8%TRIM �   #VARWR_6D �   #NCID �   #VARNAME �   #STRT6D �   #CNT6D �                 @                            �     TRIM          
@ @@                             �                    
 -             p        5 2 � p        r �     n                                    5  p        5 2 � p        r �     n                                       4  p        5 2 � p        r �     n                                       3  p        5 2 � p        r �     n                                       2  p        5 2 � p        r �     n                                       1  p          5 2 � p        r �     n                                           1    5 2 � p        r �     n                                       2    5 2 � p        r �     n                                       3    5 2 � p        r �     n                                       4    5 2 � p        r �     n                                       5    5 2 � p        r �     n                                       6      5 2 � p        r �     n                                           1    5 2 � p        r �     n                                       2    5 2 � p        r �     n                                       3    5 2 � p        r �     n                                       4    5 2 � p        r �     n                                       5    5 2 � p        r �     n                                       6                                                                                             
@ @@                              �                     
@ @@                             �                    1           
@ @@                              �                    +   p          p            p                                   
@ @@                              �                    ,   p          p            p                          #         @     @X                            �                  #NCWR_6D_R4%TRIM �   #VARWR_6D �   #NCID �   #VARNAME �   #STRT6D �   #CNT6D �                 @                            �     TRIM          
@ @@                             �                    	 0             p        5 2 � p        r �     n                                    5  p        5 2 � p        r �     n                                       4  p        5 2 � p        r �     n                                       3  p        5 2 � p        r �     n                                       2  p        5 2 � p        r �     n                                       1  p          5 2 � p        r �     n                                           1    5 2 � p        r �     n                                       2    5 2 � p        r �     n                                       3    5 2 � p        r �     n                                       4    5 2 � p        r �     n                                       5    5 2 � p        r �     n                                       6      5 2 � p        r �     n                                           1    5 2 � p        r �     n                                       2    5 2 � p        r �     n                                       3    5 2 � p        r �     n                                       4    5 2 � p        r �     n                                       5    5 2 � p        r �     n                                       6                                                                                             
@ @@                              �                     
@ @@                             �                    1           
@ @@                              �                    .   p          p            p                                   
@ @@                              �                    /   p          p            p                             �   0      fn#fn '   �      b   uapp(M_NETCDF_IO_WRITE    �   �      gen@NCWR    �  �      NCWR_SCAL_R4 "     =      NCWR_SCAL_R4%TRIM (   K  @   a   NCWR_SCAL_R4%VARWR_SCAL "   �  @   a   NCWR_SCAL_R4%NCID %   �  L   a   NCWR_SCAL_R4%VARNAME      �      NCWR_SCAL_R8 "   �  =      NCWR_SCAL_R8%TRIM (   �  @   a   NCWR_SCAL_R8%VARWR_SCAL "     @   a   NCWR_SCAL_R8%NCID %   Z  L   a   NCWR_SCAL_R8%VARNAME    �  �      NCWR_SCAL_INT #   .  =      NCWR_SCAL_INT%TRIM *   k  @   a   NCWR_SCAL_INT%VARWR_SCALI #   �  @   a   NCWR_SCAL_INT%NCID &   �  L   a   NCWR_SCAL_INT%VARNAME    7  �      NCWR_1D_R8     �  =      NCWR_1D_R8%TRIM $     <  a   NCWR_1D_R8%VARWR_1D     I	  @   a   NCWR_1D_R8%NCID #   �	  L   a   NCWR_1D_R8%VARNAME "   �	  �   a   NCWR_1D_R8%STRT1D !   i
  �   a   NCWR_1D_R8%CNT1D    �
  �      NCWR_1D_R4     �  =      NCWR_1D_R4%TRIM $   �  <  a   NCWR_1D_R4%VARWR_1D       @   a   NCWR_1D_R4%NCID #   O  L   a   NCWR_1D_R4%VARNAME "   �  �   a   NCWR_1D_R4%STRT1D !   /  �   a   NCWR_1D_R4%CNT1D    �  �      NCWR_1D_INT !   ^  =      NCWR_1D_INT%TRIM &   �  <  a   NCWR_1D_INT%VARWR_1DI !   �  @   a   NCWR_1D_INT%NCID $     L   a   NCWR_1D_INT%VARNAME #   c  �   a   NCWR_1D_INT%STRT1D "   �  �   a   NCWR_1D_INT%CNT1D    �  �      NCWR_1D_CHAR "   '  =      NCWR_1D_CHAR%TRIM '   d  D  a   NCWR_1D_CHAR%VARWR_1DC "   �  @   a   NCWR_1D_CHAR%NCID %   �  L   a   NCWR_1D_CHAR%VARNAME $   4  �   a   NCWR_1D_CHAR%STRT1D #   �  �   a   NCWR_1D_CHAR%CNT1D    \  �      NCWR_2D_R8     �  =      NCWR_2D_R8%TRIM $   2  x  a   NCWR_2D_R8%VARWR_2D     �  @   a   NCWR_2D_R8%NCID #   �  L   a   NCWR_2D_R8%VARNAME "   6  �   a   NCWR_2D_R8%STRT2D !   �  �   a   NCWR_2D_R8%CNT2D    ^  �      NCWR_2D_R4     �  =      NCWR_2D_R4%TRIM $   4  x  a   NCWR_2D_R4%VARWR_2D     �  @   a   NCWR_2D_R4%NCID #   �  L   a   NCWR_2D_R4%VARNAME "   8  �   a   NCWR_2D_R4%STRT2D !   �  �   a   NCWR_2D_R4%CNT2D    `   �      NCWR_2D_INT !   �   =      NCWR_2D_INT%TRIM &   8!  x  a   NCWR_2D_INT%VARWR_2DI !   �#  @   a   NCWR_2D_INT%NCID $   �#  L   a   NCWR_2D_INT%VARNAME #   <$  �   a   NCWR_2D_INT%STRT2D "   �$  �   a   NCWR_2D_INT%CNT2D    d%  �      NCWR_2D_CHAR "   �%  =      NCWR_2D_CHAR%TRIM %   <&  �  a   NCWR_2D_CHAR%CHAR_2D "   �(  @   a   NCWR_2D_CHAR%NCID &   �(  L   a   NCWR_2D_CHAR%TVARNAME $   H)  �   a   NCWR_2D_CHAR%STRT2D #   �)  �   a   NCWR_2D_CHAR%CNT2D    p*  �      NCWR_3D_R8     	+  =      NCWR_3D_R8%TRIM $   F+  �  a   NCWR_3D_R8%VARWR_3D     �.  @   a   NCWR_3D_R8%NCID #   :/  L   a   NCWR_3D_R8%VARNAME "   �/  �   a   NCWR_3D_R8%STRT3D !   0  �   a   NCWR_3D_R8%CNT3D    �0  �      NCWR_3D_R4     G1  =      NCWR_3D_R4%TRIM $   �1  �  a   NCWR_3D_R4%VARWR_3D     85  @   a   NCWR_3D_R4%NCID #   x5  L   a   NCWR_3D_R4%VARNAME "   �5  �   a   NCWR_3D_R4%STRT3D !   X6  �   a   NCWR_3D_R4%CNT3D    �6  �      NCWR_3D_INT !   �7  =      NCWR_3D_INT%TRIM &   �7  �  a   NCWR_3D_INT%VARWR_3DI !   x;  @   a   NCWR_3D_INT%NCID $   �;  L   a   NCWR_3D_INT%VARNAME #   <  �   a   NCWR_3D_INT%STRT3D "   �<  �   a   NCWR_3D_INT%CNT3D    ,=  �      NCWR_4D_R8     �=  =      NCWR_4D_R8%TRIM $   >  �  a   NCWR_4D_R8%VARWR_4D     �B  @   a   NCWR_4D_R8%NCID #   2C  L   a   NCWR_4D_R8%VARNAME "   ~C  �   a   NCWR_4D_R8%STRT4D !   D  �   a   NCWR_4D_R8%CNT4D    �D  �      NCWR_4D_R4     ?E  =      NCWR_4D_R4%TRIM $   |E  �  a   NCWR_4D_R4%VARWR_4D     lJ  @   a   NCWR_4D_R4%NCID #   �J  L   a   NCWR_4D_R4%VARNAME "   �J  �   a   NCWR_4D_R4%STRT4D !   �K  �   a   NCWR_4D_R4%CNT4D     L  �      NCWR_4D_INT !   �L  =      NCWR_4D_INT%TRIM &   �L  �  a   NCWR_4D_INT%VARWR_4DI !   �Q  @   a   NCWR_4D_INT%NCID $   (R  L   a   NCWR_4D_INT%VARNAME #   tR  �   a   NCWR_4D_INT%STRT4D "   S  �   a   NCWR_4D_INT%CNT4D    �S  �      NCWR_5D_R8     5T  =      NCWR_5D_R8%TRIM $   rT  ,  a   NCWR_5D_R8%VARWR_5D     �Z  @   a   NCWR_5D_R8%NCID #   �Z  L   a   NCWR_5D_R8%VARNAME "   *[  �   a   NCWR_5D_R8%STRT5D !   �[  �   a   NCWR_5D_R8%CNT5D    R\  �      NCWR_5D_R4     �\  =      NCWR_5D_R4%TRIM $   (]  ,  a   NCWR_5D_R4%VARWR_5D     Tc  @   a   NCWR_5D_R4%NCID #   �c  L   a   NCWR_5D_R4%VARNAME "   �c  �   a   NCWR_5D_R4%STRT5D !   td  �   a   NCWR_5D_R4%CNT5D    e  �      NCWR_6D_R8     �e  =      NCWR_6D_R8%TRIM $   �e  h  a   NCWR_6D_R8%VARWR_6D     Fm  @   a   NCWR_6D_R8%NCID #   �m  L   a   NCWR_6D_R8%VARNAME "   �m  �   a   NCWR_6D_R8%STRT6D !   fn  �   a   NCWR_6D_R8%CNT6D    �n  �      NCWR_6D_R4     �o  =      NCWR_6D_R4%TRIM $   �o  h  a   NCWR_6D_R4%VARWR_6D     8w  @   a   NCWR_6D_R4%NCID #   xw  L   a   NCWR_6D_R4%VARNAME "   �w  �   a   NCWR_6D_R4%STRT6D !   Xx  �   a   NCWR_6D_R4%CNT6D 